source("C:/Users/chrs0003/Desktop/FOX_R/R/DataAnalysis/HRTests/init.R")


resRaw <- compareHRMobile(data=errorsHR, resultsPath=HR_RESULTS_PATH, writeResults=writeResults,
                          iterations=iterations, kernelPercent=kernelPercent, mcpPercent=mcpPercent, 
                          kernelh=kernelh, name="raw")